home *** CD-ROM | disk | FTP | other *** search
/ Over 1,000 Windows 95 Programs / Over 1000 Windows 95 Programs (Microforum) (Disc 1).iso / 1262 / dbase.cf_ / dbase.cf
Text File  |  1996-03-12  |  4KB  |  211 lines
  1. ; -------------------------------------------------------------------------
  2. ; ----------- EasyCODE(SPX) - Configuration for dBASE IV ------------------
  3. ; -------------------------------------------------------------------------
  4.  
  5. [GenOptions]
  6. InitialIndent=0
  7. CompressBlanks=no
  8. GenFileExt=PRG
  9. MaxIndent=900
  10. MaxLineLength=1024
  11.  
  12. [Settings]
  13. SourceFileFormat=OEM
  14.  
  15. [ParseOptions]
  16. Parser=easy-xbs.dll
  17. SuppressDoInProcedureCall=yes
  18. SuppressLastReturnInProcedure=yes
  19.  
  20. [AvailableConstructs]
  21. Statement=yes
  22. If=yes
  23. Switch=yes
  24. Case=no
  25. For=no
  26. While=yes
  27. Repeat=yes
  28. Loop=yes
  29. Exit=yes
  30. Procedure=yes
  31. Call=yes
  32. Function=yes
  33. Block=yes
  34. Frame=yes
  35. Condition=yes
  36. And=yes
  37. Or=yes
  38. Not=yes
  39.  
  40. [InsertMenuStrings]
  41. ;Statement=
  42. ;If=
  43. Switch="D&O CASE"
  44. When="  &CASE"
  45. ;Case=
  46. ;Of=
  47. ;For=
  48. While="DO &WHILE"
  49. ;Repeat=
  50. ;Loop=
  51. ;Exit=
  52. Procedure=&PROCEDURE
  53. Call=DO
  54. Function=&FUNCTION
  55. ;Block=
  56. ;Frame=
  57. ;Condition=
  58. ;And=
  59. ;Or=
  60. ;Not=
  61.  
  62. [EncloseMenuStrings]
  63. ;If=
  64. ;Then=
  65. ;Else=
  66. Switch="DO &CASE"
  67. When=&CASE
  68. WhenNone=&OTHERWISE
  69. ;Case=
  70. ;Of=
  71. ;Otherwise=
  72. ;For=
  73. While="DO &WHILE"
  74. ;Repeat=
  75. ;Loop=
  76. ;Exit=
  77. Procedure=&PROCEDURE
  78. Function=&FUNCTION
  79. ;Block=
  80. ;Frame=
  81. ;Condition=
  82. ;And=
  83. ;Or=
  84. ;Not=
  85.  
  86. [KeywordStrings]
  87. If=IF
  88. Then=THEN
  89. Else=ELSE
  90. Switch="DO CASE"
  91. ;FirstWhen=
  92. When=CASE
  93. WhenNone=OTHERWISE
  94. ;Case=
  95. ;FirstOf=
  96. ;Of=
  97. ;Otherwise=
  98. For=FOR
  99. While="DO WHILE"
  100. Repeat=REPEAT
  101. Loop=LOOP
  102. Exit=EXIT
  103. Procedure=PROCEDURE
  104. Function=FUNCTION
  105. ;Block=
  106. And=AND
  107. Or=OR
  108. Not=NOT
  109.  
  110. [MetaStrings]
  111. ;SegmentHeader=
  112. ;Statement=
  113. ;Condition=
  114. ;Expression=
  115. ;Value=
  116. ;ForStatement=
  117. ;ProcedureHeader=
  118. ;ProcedureCall=
  119. ;FunctionHeader=
  120. ;BlockComment=
  121. ;FrameHeader=
  122. ;FrameFooter=
  123.  
  124. [GenStrings]
  125. Statement=''
  126. EndStatement='\N'
  127.  
  128. If='\NIF \3+'
  129. ThenBody='\N'
  130. ElseBody='\N\3-ELSE\3+\n'
  131. EmptyElseBody=''
  132. EndIf='\N\3-ENDIF\n'
  133.  
  134. Switch='\NDO CASE\n\3+'
  135. FirstWhen='\NCASE \5+'
  136. FurtherWhen='\N\3-CASE \5+'
  137. WhenBody='\N\2-'
  138. WhenNoneBody='\N\3-OTHERWISE\n\3+'
  139. EmptyWhenNoneBody='\N'
  140. EndSwitch='\N\6-ENDCASE\n'
  141.  
  142. ; Warning!
  143. ; The GenStrings Case, FirstOf, FurtherOf, OfBody,
  144. ; OtherwiseBody und EmptyOtherwiseBody are not provided,
  145. ; because the CASE construct is not supported by Dbase IV.
  146. ; Please use the SWITCH construct instead!
  147. ; Due to the GenString EndCase you will find the following hint 
  148. ; in the generated source program:
  149. EndCase='\s\0:\n\nWarning! CASE construct not allowed.\n\n\r'
  150.  
  151. ; Warning!
  152. ; The For and ForBody are not provided,
  153. ; because the FOR construct is not supported by Dbase IV.
  154. ; Please use the WHILE construct instead!
  155. ; Due to the GenString EndFor you will find the following hint 
  156. ; in the generated source program:
  157. EndFor='\s\0:\n\nWarning! FOR construct not allowed.\n\n\r'
  158.  
  159. While='\NDO WHILE \9+'
  160. WhileBody='\N\7-'
  161. EndWhile='\N\2-ENDDO\n'
  162.  
  163. Repeat='\NDO WHILE .T.\n\3+'
  164. Until='\NIF \3+'
  165. EndRepeat='\NEXIT\n\3-ENDIF\n\3-ENDDO\n'
  166.  
  167. Loop='\NDO WHILE .T.\n\3+'
  168. EndLoop='\N\3-ENDDO\n'
  169.  
  170. Exit='\NIF \3+'
  171. EndExit='\NEXIT\n\3-ENDIF\n'
  172.  
  173. Procedure='\NPROCEDURE \10+'
  174. ProcedureBody='\N\7-'
  175. EndProcedure='\N\3-RETURN\n'
  176.  
  177. Call='\NDO \3+'
  178. EndCall='\n\3-'
  179.  
  180. Function='\NFUNCTION \9+'
  181. FunctionBody='\N\6-'
  182. EndFunction='\N\3-RETURN\n'
  183.  
  184. Block='\N* \"\n\i* "'
  185. BlockBody='\N\2+'
  186. EndBlock='\N\2-'
  187.  
  188. Frame='\N'
  189. FrameBody='\N\3+'
  190. EndFrameBody='\N\3-'
  191. EndFrame='\N'
  192.  
  193. BeginAnd='      (\7+'
  194. And=');\n\7-.AND. (\7+'
  195. EndAnd=')\7-'
  196. BeginOr='      (\7+'
  197. Or=');\n\7-.OR.  (\7+'
  198. EndOr=')\7-'
  199. BeginNot='.NOT. (\7+'
  200. EndNot=')\7-'
  201. Condition=''
  202. EndCondition=''
  203.  
  204. Segment='\N* \"n\i* "'
  205. SegmentBody='\N\2+'
  206. EndSegment='\N\2-'
  207.  
  208. TopSegment='* Generated by \%PNAME% V\%PVER% at \%TIME%\n* with \%CFG%\n\n* \"\n* "'
  209. TopSegmentBody='\n\n'
  210. EndTopSegment='\N'
  211.